Language/OS - Multiplatform Resource Library/LANGUAGE OS.iso/lisp/eulisp/comp0_89.lha/Feel/Boot/Compiler/i-macros.fm

Text File | 1993-07-16 | 2KB | 313 lines

(standard0 list-fns scan-args)
1
514
(nargs 0 "~a-info" progn defconstant make-instruction quote name bytecode lambda x make-instance instruction info args convert <vector> add-instruction export 39 (definstruction) ((strip (union (import standard0) (import list-fns) (import scan-args))) definstruction) i-macros)
36
0 0 17 0
5
0 0 0 0
3
0
31
0 0 110 0
17
1
36
0 0 27 0
5
0 0 0 0
4
0 0 23 0
46
1
(boot . make-installed-module)
34
2
36
0 0 40 0
5
0 0 0 0
8
3
4
0 0 21 0
5
0 0 24 0
3
0
39
8
0
17
1
1
(boot . install-local-bindings)
34
3
17
1
36
0 0 28 0
5
0 0 1 0
8
3
4
0 0 22 0
1
(boot . make-interface)
34
2
17
1
14
2
1
37
22
0
36
0 0 23 0
11
40
-3
4
0 0 20 0
30
7
0 0 24 0
18
3
1
37
36
0 0 29 0
1
(scan-args . scan-args)
4
0 0 1 0
8
5
4
0 0 2 0
12
34
3
1
(symbols . make-symbol)
36
0 0 29 0
1
(extras0 . format)
3
0
4
0 0 3 0
8
10
3
0
39
12
34
-3
62
1
4
0 0 4 0
4
0 0 5 0
11
4
0 0 6 0
4
0 0 7 0
4
0 0 8 0
3
0
39
39
4
0 0 7 0
8
11
3
0
39
39
4
0 0 7 0
4
0 0 1 0
3
0
39
39
8
8
4
0 0 7 0
4
0 0 9 0
3
0
39
39
8
13
36
0 0 49 0
1
(boot . append)
36
0 0 30 0
1
(init . mapcar)
36
0 0 179 0
8
20
40
1
8
20
3
0
12
34
-3
3
0
11
34
2
39
39
39
39
39
39
39
3
0
39
39
39
4
0 0 5 0
8
8
4
0 0 10 0
4
0 0 11 0
3
0
39
4
0 0 12 0
4
0 0 13 0
4
0 0 7 0
4
0 0 14 0
3
0
39
39
8
9
4
0 0 7 0
4
0 0 15 0
3
0
39
39
4
0 0 16 0
4
0 0 11 0
4
0 0 17 0
3
0
39
39
39
3
0
39
39
39
39
39
39
3
0
39
39
39
3
0
39
39
39
4
0 0 18 0
4
0 0 7 0
8
10
3
0
39
39
8
10
3
0
39
39
39
4
0 0 19 0
8
5
8
11
3
0
39
39
39
3
0
39
39
39
39
14
8
2
39
37
4
0 0 7 0
3
0
39
9
12
3
0
39
29
18
15
3
37